set proc to sospro
set exclu off
dr2='Q:'
dr5='S:'
DO EOMCOBAK
RETURN

